function plot_average_image(patient, img_average);
    
    %| Plot a single coronal slice of the static and average images
    
    %------------------------------------------------------------------------
    %|      Dependancies;
    %|
    %|
    %|
    %------------------------------------------------------------------------
    %   This file is part of the
    %   5D-Novel4DCT Toolbox  ("Novel4DCT-Toolbox")
    %   DH Thomas, Ph.D
    %   University of California, Los Angeles
    %   Contact: mailto:dhthomas@mednet.ucla.edu
    %------------------------------------------------------------------------
    % $Author: DHThomas $	$Date: 2014/04/01 10:23:59 $	$Revision: 0.1 $
    if nargin < 3
        fh=findall(0,'type','figure');
        fig_num = max(fh)+1;
        
    end
    
    single_slice = floor(patient.dim(1)/2);
    figure(fig_num);
        set(gcf,'units','normalized','position',patient.default_figure_position);

    subplot(2,1,1);
    imagesc(rot90(squeeze(patient.static(single_slice,:,:))));
    colormap gray
    axis image
    axis off
    title(sprintf('Reference Image (scan number %d)', patient.ref));
    subplot(2,1,2);
    imagesc(rot90(squeeze(img_average(single_slice,:,:))));
        colormap gray

    axis image
    axis off
    title(sprintf('Averaged Image (%d scans)', patient.scans));
